﻿Public Class NotePadEdit
    Public Sub myUndo(text As RichTextBox)
        text.Undo()
    End Sub

    Public Sub myRedo(text As RichTextBox)
        text.Redo()
    End Sub

    Public Sub myCut(text As RichTextBox)
        text.Cut()
    End Sub

    Public Sub myPast(text As RichTextBox)
        text.Paste()
    End Sub

    Public Sub myDelete()

    End Sub
End Class
